function ROIs = roiofneuron(animal, neuron)
cellsinfo=xlscells(animal);

if ~isempty(cellsinfo)
    cells = cellsinfo(:,1);
    neuronIDs = cells == neuron;
    expIDs = cellsinfo(neuronIDs, 2);
    ROIIDs = cellsinfo(neuronIDs, 3);
    if ~isempty(expIDs)
        for i=1:length(expIDs)
            [activity, oris, eyes]  = getcellactivity(expIDs(i),ROIIDs(i));
            ROIs(i).avtivity = activity;
            ROIs(i).eye = eyes;
            ROIs(i).orientation = oris;
            ROIs(i).ExpID = expIDs(i);
        end
    else
        ROIs = [];
    end
else
    ROIs = [];
end
